home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 126-150 / disk_143 / rim / rimsrcami.arc / CDCDBS.BLK < prev    next >
Text File  |  1988-01-05  |  914b  |  24 lines
  1. C
  2. C  *** / C D C D B S / ***
  3. C
  4. C  CURRENT DATABASE PERMANENT FILE DATA - CDC CYBER (BOEING)
  5. C
  6.       COMMON /CDCDBS/DBDATA(5,10),NUMOPN
  7.       INTEGER DBDATA
  8.       INTEGER NUMOPN
  9. C
  10. C  VARIABLE DEFINITIONS:
  11. C         DBDATA(1,J) -- DATABASE NAMES IN H FORMAT (6HDBNAME)
  12. C         DBDATA(2,J) -- DATABASE PERMANENT FILE NAMES IN H FORMAT
  13. C         DBDATA(3,J) -- PERMANENT FILE USER NUMBERS IN H FORMAT
  14. C         DBDATA(4,J) -- PERMANENT FILE PASSWORDS IN H FORMAT
  15. C         DBDATA(5,J) -- DATABASE MODIFICATION INDICATORS
  16. C                        0 = USER CONTROLLED FILE HANDLING
  17. C                        1 = INDIRECT ACCESS
  18. C                        2 = DIRECT ACCESS (READ ONLY)
  19. C                        3 = DIRECT ACCESS (WRITE)
  20. C                        4 = "DEFINE" DATABASE
  21. C                       <0 = DATABASE HAS BEEN MODIFIED (IE -1)
  22. C         NUMOPN - NUMBER OF DATABASES IN DBDATA
  23. C
  24.